home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C/C++ Users Group Library 1996 July
/
C-C++ Users Group Library July 1996.iso
/
listings
/
v_02_04
/
2n04075b
< prev
next >
Encoding:
Amiga
Atari
Commodore
DOS
FM Towns/JPY
Macintosh
Macintosh JP
Macintosh to JP
NeXTSTEP
RISC OS/Acorn
Shift JIS
UTF-8
Wrap
Text File
|
1991-03-19
|
287 b
|
9 lines
OPEN "COM1:9600,N,8,1"
PLAY "o3 l8 e. l16 d l8 cdee l4e" 'Mary had a little lamb
FOR X = 1 TO 10: READ A$: B$ = B$ + A$: NEXT
CIRCLE (230, 130), 150, 9, -.6, -5.8
OPEN FileName$ FOR ISAM RecType Table$ AS #1
REDIM PRESERVE Array(-10 TO 32000) AS DOUBLE